home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TeX 1995 July
/
TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO
/
biblio
/
tib
/
tibabb
< prev
next >
Wrap
Text File
|
1989-03-28
|
573b
|
25 lines
#! /bin/csh -f
#
# tibabb -- look up a journal and find the tib abbreviation for it
#
# Usage: tibabb < keys >...
#
# Note: this is case sensitive if there is more than one word in the keys
#
if ($#argv == 1 && "$1" == -usage) then
echo " Usage: tibabb < keys > ..."
exit 0
endif
switch ($#argv)
case 0:
echo " Usage: tibabb < keys > ..."
exit 1
case 1:
grep -i -h $1 /usr/lib/tex/tib/mac/*{abb,fll}.ttz|more
breaksw
default:
set arg = `echo $* | sed 's, ,/ \&\& /,g'`
awk "/$arg/" /usr/lib/tex/tib/mac/*{abb,fll}.ttz|more
endsw